home *** CD-ROM | disk | FTP | other *** search
/ Mac Mania 4 / MacMania 4.toast / / Demo's / magic-mac-121-demo / MAGIC_C / DEMOS / CIRCLES.PRG < prev    next >
Text File  |  1994-11-27  |  7KB  |  84 lines
  1. `BK#¸@BN˘`@----------------   Pure Pascal  for Atari STe/TT  Version 1.0    (c) 1992 Pure   Software GmbH  ----------------3¿YH`BπYJNê yYJ fÓJπYRgaHaV yYNN–
  2. Runtime error  at offset $0123456789ABCDEFHP?<    NA\ONuOÔˇˆA˙ˇ¿aˇÍ09YHr OaR OpB0aˇŒ&y[⁄J´ g0A˙ˇ°aˇ∫&9YRñ´8<Èõ¿|;ê??<NAXOQÃˇË?<NAOÔ Nur&H  fr&o¡[˙¡YF + –´–º*@–´€À,UCÌ#…Y^"k€È"¬<¸*AYM#Õ[‚.M// ?<?<JNAOÔ #À[⁄pr+ÄgÑ≤<fH k, AfE˙"Htµ    V ˇ¸gJf¸Jf‚`ZARGV=Jf¸XO$I`JgFR@Jf¸HRaå$I`ÏAÎÅ"HB0≤< c≤<"fÚrJg "fˆ`‰B(ˇˇR@HQ"HJf÷*â3¿[fiJ9[˙g˙Bß?< NA\O xÚ"(≤® e\$<≤∏dz¥∏et≤∏ dn¥∏ eh≤∏db¥∏e\≤∏dV¥∏eP≤∏dJ¥∏eD≤∏d>¥∏e8≤∏ d2¥∏ e,`0≤∏e$≤∏ e≤∏e≤∏e≤∏e ≤∏e≤∏ dB9[˙/?< NA\O#¸x[æ#¸~[¬#¸í[Δ#¸ò[ #¸û[Œ#¸§[“#¸™[÷aû#¸ˆYNHyäN÷0<£`0<§r;ˇkB/o
  3. `:0<•`40<»`.0<…`(0<◊`"HP o P@¿e P@ˇb
  4.  _/9[÷Nu _0<®Nh"yY^±…b0< Na#ÔYRBgHz?<Ns`¸ê?9YH?<LNAJ9[˙g~p y[æav#»[æp y[¬ad#»[¬p y[ΔaR#»[Δp y[ a@#»[ p y[Œa.#»[Œp y[“a#»[“p y[÷a
  5. #»[÷NuHÁĆ>ºNMPO @$_NuHR!|     1|◊∞!|ÄEËÆ!JAË4pxr∞d2E˘B`ÚQ…ˇ¯B$_Nu2<◊∞0(∞Ag^¿A∞AfLHPa _JyYVf ( g"@Në3¿YVNuJyYVf"0(∞|◊∞g ∞|◊≤f (g
  6. "@Në3¿YVNu$9YX"Âä‘ÅÂä‘Å‘Ç‘ÅÂä‘ÅÁä‘ÅÂä‘ÅÁäîÅÈä‘Å‘Ç‘ÅÂä‘ÅÂä‘ÅRÇ#¬YXHB¿¬H@Nu0(¿|◊∞∞|◊∞f™HS&H k◊∞gaˇ:Rkp'@'@ 7@¨ +g "@ KNë3¿YV&_Nu0(¿|◊∞∞|◊∞fbHS&H k◊∞g + g
  7. "@Në3¿YVTkp'@'@ 7@¨ +g "@ KNë3¿YV&_Nup¿|ˇ#◊YR`˙Nr;Nu    
  8.  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`ABCDEFGHIJKLMNOPQRSTUVWXYZ{|}~ÄöêÉéÖèÄàâêãåçéèêííìôïñóòôöõúùûü†°¢£••¶ß®©™´¨≠ÆØ∞±≤≥¥µ∂∑∏π∫ªºΩæø¿¡¬√ƒ≈Δ«»… ÀÃÕŒœ–—“”‘’÷◊ÿŸ⁄€‹›fifl‡·‚„‰ÂÊÁËÈÍÎÏÌÓÔÒÚÛÙıˆ˜¯˘˙˚¸˝˛ˇpJ@k˙ h◊≤eHÁ&H(I6xñc`p a∂QÀˇ¯`a™QÃˇ¯JyYVf (g
  9. "@Në3¿YV KLflNuC˙`ˇ†
  10. JyYVfn"( ≤®b2(¨f* (gHP"@Në _3¿YVfFJ® f˨˨`2"("h®¨g1ˇ`
  11. 1RÅ!A∞<gÃ∞<gÃ(¸¨NuJyYVf0"h"(ÄRÅ!A (SÄ≤Äe (gHP"@Në3¿YV _NuRHHPJ@l
  12. JAg¸-D@C˙&∞Ye¸2)ˇ˛t    êAU ˇ¸–A˚ 2fÓ"_ êâNu'Ëd
  13. 09876543210ø˘Y^cNu?@¿f
  14. TO0< `˝`0Nua
  15. 3¿YVNuJÄlD@ê| ∞|l–@0; `p`pNuHRHS&Hp'@'@'@ 0+∞|◊±g$<
  16. ¨'Bê|◊≤f2<<`'|
  17. j'|
  18. ~p`7|◊≤2<=J+4gl$+4¥ºNULgV¥ºAUXgPRNg†¥ºCONgDƒºˇˇˇ¥ºLPTgv¥ºCOMgX'|
  19. B ?Hk4?NAPOJÄl aˇ 7|◊∞`6Äp&_$_Nu k◊±gp$< 'B'B`‹p'|
  20. ⁄B´`Ã+7î<1SbúJ+8fñp`+7î<1UbÜJ+8fÄp'|
  21. ¨`òHSHR&H??<>NAXOJ@f7|◊∞p$_&_Nua˛v`Ùa˝<∞<
  22. g˨pNuHRHP/(/(??<?NAOÔ  _$_JÄk˛>!@ B®pNuHRHP/(/(??<@NAOÔ  _$_JÄk˛B®B® pNuHPaˇ† _J@f$"( ≤®g"hºR® A˘Zêa¸ñpNuHRHP"h (”¿B`J!fº Q»ˇˆHQ?<    NA\O _$_B®B® pNu3¸fYVNu3¸gYVNu3¸iYVNuBy[¯By[‡A˙p,"@ "àA◊ÚÄ3¸@@[‡"Ä`"Äp"@ "º ®1¸˙B3¸ÄÄ[‡"ÄO–Nu/
  23. Hzˇ∞?<&NN\O$_NuJ˘[˚fêA˘[ÊByYHBπYJBπYRByYVBπYX¸Y\BP!H!H#»[Bπ[ÙB9Y]Nπ ÆJy[‡g¸Y] |YbC˙*a¯h |Yba˘N |ZêC˙a¯P |Zêa˘~Nu09[¸NπNπFNuNπP3¿\Jy\mxHy\êHy\é |\ä"|\åNπ¥Pè3¿[˛3˘[˛\ |\p0¸Q»ˇ˙3¸\Hy\"|[¸A˘\Nπ»XèJy[¸n
  24. NπFp`pNupNuJ˘\íf Nπ ¿NπΔNu/
  25.  Circles 0<ë»NπÿNu0<ë»NπÿNu≤@m0Nu≤@n0Nu/
  26. $H 
  27. JÄjġˇH@H¿$_Nu/
  28. $H 
  29. ¿ºÄˇˇj¿ºˇˇg塡$_Nu09\®–y\§∞y\Æo<09\®ê|∞y\Æl*09\™ê|∞y\∞l09\™–y\¶∞y\∞opNupNuHÁ0$I&H02aˇV60*2+aˇH80–j2“kaˇ>:0*–j2+“kaˇ(4É5D2íC5A2íD5A∂El∏@lp`pLfl 8Nu//(&29[¸√@Nπé09[¸2Nπr09[¸2NπÄ(&NuNVˇ‡HÁ EÓˇJy\öo~09\¶29\§a˛†H¿Å¸NπH689\¨pNπBJ@gDa˛∫Jga˛Z09\§NπH<‹y\®09\¶NπH–y\™=@ˇÓ0NπH2RA09[¸Nπé09[¸rNπÄpNπH2RA09[¸NπdHnˇ˛Hnˇ¸AÓˇ¯CÓˇ˙09\örNπRPèHjHj JCÍ09\ör NπRPè`vAÓˇ¯"Ja˛RJgJ0=@ˇ‚2*=Aˇ‰–jS@=@ˇÊ“jSA=AˇË09[¸rAÓˇ‚Nπ:?09[¸24.ˇÓNπTèHjHj JCÍ09\ör NπRPèJjoJjnˇ~Jga˝pNπBLflxN^NuNVˇ‰/
  30. EÓˇJy\öo¯pNπBJ@gÍa¸Hnˇ˛Hnˇ¸AÓˇ¯CÓˇ˙09\örNπRPèHjHj JCÍ09\ör NπRPè`äAÓˇ¯"Ja˝NJg\0=@ˇ‰2*=AˇÊ–jS@=@ˇË“jSA=AˇÍ09[¸rAÓˇ‰Nπ:prta˝|09[¸rNπV09[¸AÓˇ‰NπúHjHj JCÍ09\ör NπRPèJjoJjnˇla¸pNπB$_N^NuNVˇÏ/
  31. $H0@∞|b–@0;N˚6
  32. 
  33. 
  34. ∞pa˛º`ÚBgBgBg09\ör
  35. tNπ~\è`÷0*∞y\öf»J9\¥ff3˘\®\ú3˘\™\û3˘\§\†3˘\¶\¢Hnˇ˛Hnˇ¸AÓˇ¯CÓˇ˙prNπRPè3Óˇ¯\®3Óˇ˙\™3Óˇ¸\§3Óˇ˛\¶`(3˘\ú\®3˘\û\™3˘\†\§3˘\¢\¶?9\¶?9\§?9\™09\ör49\®Nπ~\èJ9\¥gB@`p¿\¥`Ú0*∞y\öf‰HnˇˆHnˇˆAÓˇˆCÓˇˆ09\örNπRPè09\öNπÓ09\öNπBy\öp`¢`ú0*∞y\öfé?*?* ?*
  36. 4*09\örNπ~\è3Í\®3Í
  37. \™`Z0*∞y\öfN?*?* ?*
  38. 4*09\örNπ~\è3Í\®3Í
  39. \™3Í \§3Í\¶¸\≥B9\¥p$_N^NuNVˇ‹HnˇËHnˇÍHnˇÏHnˇÓHy\∞Bg?<BgBgBgBgBgBgBgBgBgBgBgAÓˇ"|\Æ09\òrtNπZOÔ.r¿AJ@gAÓˇa˝lS@f¸\≤N^NuNVˇ/
  40. EÓˇ¯Jy\önñ?9\¶?9\§0929\®49\™Nπ˛Xè3¿\öJy\öoËBgBg |a˘>R@? |a˘409\örNπ~\èa¯‰?9\¶?9\§09\ö29\®49\™Nπ(Xèa¯¨`BgBgBg09\ör
  41. tNπ~\è4π\®p–y\™5@09\®–y\§S@5@09\™–y\¶ê|5@0*∞y\îo5y\î0*∞y\ño5y\ñ09[¸r JNπ:$_N^Nu//
  42. E˘\≥a˛æa˚a˛BJf
  43. v    a˘\QÀˇ˙B 9\≤f‚$_&NuJ˘\µf–Nπ ¿NπNπΔNπ pJg≤B9\≤B9\¥pë»Nπÿ3¸0\ò3˘\\î3˘\\ñ3˘\2\¨Jy\¨g
  44. y\¨o3¸\¨09\îJ@jR@‚@3¿\§09\ñJ@jR@‚@3¿\¶09\îJ@jV@‰@3¿\®09\ñJ@jV@‰@3¿\™a˛˙Nπ \NuC˘a8HRt"¬"¬2Ç…ˇ˘"<d(0<»NBA˘b|0$_Nu"<`ˇÃ"<
  45. `ˇ¬HQC˘at#H 2¿2¡2¬"Ô"Ô "Ô"Ô"Ô"Ô2Ø "<aˇä"
  46. "_2òEÔ"Z2ò"Z2ò"Z2ò"Z2ò"Z2ê$ANuHQHP"<MaˇZ"_2ò"_2ò"o2ò"o2êNu3¿at#»cî"<N`ˇ.3¿at"<f`ˇC˘at2¿2¡2¬"Ø"<d`ˇ3¿at"<g`˛ÙC˘at2¿2¡2¬"Ø"<e`˛⁄3¿at"<k`˛ HQHPHπat"<ha˛¥"_2ò"_2ò"o2ò"o2êNuC˘at2¿2¡2¬"Ô2Ø"<i`˛ÄA˘\∂1@ 0¡1BHB0Çps"<dHRNB$_A˘]‹0NuHRHQE˘\∂5Q C˘≤"    #H o #H AËZ#H$ºd5| psNB _0π\¬$_Nuret`ˇàA˘^Ù0¡0¬Bò0ÔBPr $<1|˝¬`ˇdC˘^Ù"ÿ"ê3A˝‹2<Å$<`ˇH3¡\‘r t`ˇ:3¡\‘rt`ˇ,3¡\‘rht`ˇ3¡\‘rt`ˇ3¡\‘rt`ˇC˘^Ù"ÿ"êrr$<`˛Ï\∂\‘]‹^Ù`HÁ8J˘d@fjNπ ¿A˘a8C˘d(E˘\∂G˘d"àIË#LIË<#LIËD#L IË\#LAËú#H&äAÍ'HAÍ>'HAÍ&'H AÍ`'HLflNuz
  47. NB"ñ®
  48. N
  49.  
  56. .6$6L0$P(P0^&jZ88ΔH
  57.  
  58. 
  59. 
  60. 
  61. P
  63. à
  64. 
  65. 
  66. :    < 
  67. L
  68. 
  69. 
  70. 
  71. 
  72. "&
  73.  
  74.  
  76.  
  77. $
  78.  
  79. 
  80.  
  81. 
  82.  "|& 
  83. .$
  84.